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Priorità sprites 'CDM-’àri 

1000 rem *** priorità’ sprite 
1010 
1020 
1025 
1030 
1035 
1040 


VWi •••••••••••••••••••• 

I •JJLA^J • ••••••••••••••••• 

*•*•* *•*•*•*•*• 

forKK=0+015spoKev+KK,0!nextKK 
poKev+23,255 spoKev +23,255 

wH'H’M’IvXvXvXvIv.'v 

poKev +39 + x ,x +7 /.Va Va'VaVaVV 

.j-V' * • .* •••••••••••••••••••• 

1045 a imxt» • • • •••••• • • • • • a a a a a 

1050 forx =0to6E XvX'Xv!v!%V«Vi 
!055 reida.V.WAV/tViVtV»'/* 
10S0 poKeri2268+x ,a »’ 

^•^*A'»V»V*ViV«V»V»V«'»ViV 

1070 data 0,24,0,0,60,0,0,12S, 3 ,0,255 ,0 
1075 data 1 ,255 ,128,2 ,255 . :55,224 

1030 data 15. 255 , 2 *e ,255 2— ' -55, 

1035 data 127,255 ..254,63 ,£55,252 ,31 ,255 
1090 data 243 -15 -255,240,,25 3 
1095 data 192,1 ,255 -129,0 ,25Vf£§a\£e ,0 
l 100,data 0,?«,9,« ’KVeVMv'veV 























































































Ic<5 M'tJ 
1250 - •j 
:rs5 i*? 

'. = 85 ;:■? * 29 * z ~ - 
1270 r*z-l!itz*0*p»v*3 
1275 4 ord » lto50 «r>«*tc 
1280 nex ttctc spoKe o +2 J ,0 


Collisioni sprìtes CDM 64 

2000 rem *** collisioni sprite *** 

2020 v ^^•v.y.v.v.v.\v.v.v.v*v 

2030 forKK= 0 to 3 :poKgw+KK, 0 :nextKK 
2040 poKev+ 23 , 3 *po«eo+ 29,3 
2030 poKev + 38 , 7 ipoKev+ 40,3 
2060 pot<e 2040 ,192 : poKe 204 1,132 
2070 poKev, 120 •poKeo+ 2,200 
2080 poKeo + 1 , 100 :poKeo+ 3,100 

2030 ^•VA!*l\A , iVtV»V» # »V»V«V*V»V« 

2100 reada spoKe 12288 +x ,a 

2110 nsxtViV,*»*/»*»*»***»*»*»*»*»*»*#***.***#'*' 
2120 poKev +2 1 ,3 V«V»V»V»V#*« , #ViV»V 

2130 *orKK=lto 3 sforx= 0 to 150 
2140 poKev + 2 , 200 -x 

2130 pr int "S 5 I-OCA 2 IONE COLLISIONI (V+ 30 )!’; 

2160 n ex t >**«*«*«****%®#***#***#*»*«%%%%%%* # *0*, 

2170 nextKK ìpoKev+ 21,0 

2200 data 0 , 24 , 0 , 0 , 60 , 0 , 0 , 126 , 0 , 0 , 253,0 
2210 data 1 , 255 , 128 , 3 , 255 , 192 , 7 , 235,224 
2220 data 15 , 255 , 240 , 31 , 255 , 248 , 63 , 255,232 
2230 data 127 , 255 , 254 , 63 , 255 , 252 , 31,255 
2240 data £ 43 , 15 , 255 , 240 , 7 , 255 , 224 , 3,255 
2250 data 192 , 1 , 255 , 123 , 0 , 255 , 0 , 0 , 128,0 
2280 data 0 , 80 , 0 , 0 , 24,0 


PeeKCo +30) ”■ 
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Rotazione CDM 64 


3018 re* *** rotazione *** 

3080 j.j=0!v =53248 
3030 pove'J+39,50 
3040 poKeu,0ipoKev ♦ 1 ,0 

'^MtVhVArmkVt'iVe'tVeVeVeVeNVi 

3060 forx=0toS2 

3070 resela 

3060 poKe 12288 + x , a 

3080 nexl x 

3100 -for x=0toS2 

3110 re»ds 

3120 poKe 12352+X ,a 

3130 rex-t x 

3140 far x=0to62 

3150 reada 

3150 poKe 1241S **%!•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*« 

iWVAV»V»VtV»V#%V»V«V«V»V»'eV 

3180 poKew+tl,l 

3190 data 255,255,255-255.0.1,£35.9,1 
320C data 255,8, l ,255,0,1,253,0,1 
3210 data 255 - 01 ,2S5,e , 1 ,255 ,0,1 
3220 data 255,0,1.255,0,1,255,0,1 
3230 data 255.0,1.255,9 I,255,0,1 
3240 data 255,0.1,255,0,1,253,0,1 
3250 data 255,0,1,255,0,1,255,255,255 
3260 data 255,255,255,123,255,1,126,255,1 
32^0 data 123 ,255 - I , 129 .255,1 ,1£8,255,i 
3280 data 128 .255 1 . 123,255,1,1£3,255,1 
3230 data 129,255,1,123,255,1,123,255,1 
3300 data 128,255,1,122,255,•,123,255,1 
3310 data 123,255,1,126,255,1,128,255,1 
3320 data 183 ,255,1,128,255,1,255,255,255 
3330 data 255,255,255,126,0,255,123,0,255 
3340 data 128,0,255,123,0,255,128,0,255 
3350 data ! 23,8,255,128,0,255,123,0,255 
3360 data 128,0,255,128,0,255,128,0,255 
3370 data 128,0,255,128,0,255,128,0,255 
3380 data 128,0,255,128,0,255,128,0,255 
3330 data 128,0,255,128,0,255,255,255,255 
3400 poKev+23,1spoKew+23,1 
3410 -for x =0 to £ 

3420 poKe 2040,192+x 

3430 poKe u ,q:q = q+5:JJ=JJ+5 ! if q >250 then 
3440 i-fj j >750thenpoKev+2 1 ,0tgoto3480 
3450 -for d = l to 50:next d 
3460 next x 
3470 goto3410 


=20 
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• •••••• • • ( 

I •••••• • • • 

• • • ••••••< 

I •••••• • • • 


l' AnimoJe che commino CDM 64 

r^*-p».-a ■** 

-«s\e. s*«'.%V.*.V. V.w.w. 

453C - - rw 

4540 p oK< v ^3|«f (WÌV«M»\ > , V> Vi 
4550 poKe«*39,50 
4560 peKso + 1 ,200. 

4570 *orx=0-to62 •*•*•*•*•"•*■*#**•«%**' 
i*|{|pe re ad 
4550 poKe12289+x ,a 
4600 next x 
a 6 10 -forx =0to62 

4620 •••••••••• 

46 39VgVJVr%*iV**a*a*a%*a*a*a # a # **a # *** # #*# # # # a # 

4 5 4 0*4f4^0?»*#*»**"**«%*************#*#*******»*** > ***«* 

4650 data 0,0,0,0,0,0,0,0,144 

4660 data 0,0,96,0,0,240,0,1,248 

4670 data 131,255,252,71,255,238,47,255,196 

4680 data 31,255,128,15,255,128,15,255,128 

4690 data 15,255,129,20,1,64,20,1,64 

4700 data 20,1,64,36,1,32,72,0,144 

4710 data 144,0,72,144,0,72,0,0,0 

4720 data 0,0,0,0,0,0,0,0,144 

4730 data 0,0,86,0,0,240,0,1,248 

4740 data 3,255,252,7,255,239,15,255,196 

4750 data 255,255,128,15,255,123,15,255,129 

4760 data 15,255,128,20 , !,64,20,1,84 

4770 data 20,1,64,20,1,64,19,2,80 

<5’?0 data 9,4,128,9,4,128,0,0,0 

4" , 90 poKe 2040,192 

4900 poKeo +21,1 

4816 poKe v ,q-'4=q+3: j j =j.j+3*. jf q>250 then q = 

4820 i-f j.j >300thenpoKeo + 21,0 :gotc4880 

4830 tor d = 1 to 50!r>ex-t d 

4340 POKe o,q!q=q+3 

4350 poKe 2040,193 

4860 -for d = l to 50Srext d 

4870 goto 4790 


20 


Uomo che commino CDM 64 

imina *** 


6000 

r «m 

* * * uomo che 

6010 

rem 


6020 

-j . j 55 0 

iv=53248 

6030 

poKev ,0ìpoKey+l,0 

6040 

poKe 

o+39,7 

6050 

poKe 

o +28,1 

6060 

poKe 

o+37,2 

6070 

poKe 

0+38,3 




















'V V 



6080 
8090 
6100 
61 10 

5 120 
8130 
8140 
6150 
6160 

6 170 
6180 
8190 
6E00 
6210 
8220 
6230 
6240 
6250 
62SC 
6270 
6260 
6290 
6300 
6310 
6320 
6330 
6340 
6350 
6360 
6370 
6380 
6390 
6400 
6410 
5420 
6430 


>!^!*w«v.VtV» , . , . , .v.*,v#',v, , XvX 

*•*•*•*•*•"•*•*• *•*•*•*•*•*•*•*« 
readaipoKe 12266+x ,iV«V.V,V.'#%V#V»V 

31* • •*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*•*** 

ywivMv.v.v.v.v.'a'.'.'.v.'.v.Vt 

readaipoKa 12352+x,a 

® ® ® ® «#999t9t#S0tt0§9§#0§9t9Ct 

WtAViVìVAViVAVAV •••••••• 

data 0,84,0,-0,64,0,0,64,0 
data 0,84,0,0,32,0,0,32,9 
data 0,163,0,0,166,9,2,34,0 
data 2,34,0,8,32,123,8,32,123 

’AV.Vjw/.VtWdVA'.'.'.’.'.’.'t't'.v!' 
data 0.43,0 ,0,46,0.0 ,4eTÀ Va V*** Va** 1 V»V 

d a t ^•?.vav«v.vwì , !vMv!v, ,, !vX 
ipriti s . V.W.V.W.V.V 

data 0,94,0,0,€4,C,0,84,126 

•#••••9999 

data e 84 -iV,VAVAV*V.V.V.V.V.V( 

data 0,ise,a,*>:63,e,£,3£,9 .VaVaV» 

ri ri r» • ♦ r• • • • ■ • • # # » # 

data 2,32,0,5 32-0,6, SSiVp'tVtViV»'»'» • 

data 0,32,0,3 t9 ,0,0 ,6JwVtV»%V»V#V»%V 
data 0,51 -46 .0,51 ,43,0,48,19 3- *•%%*•*•*• V«V 
data 0,48, 192,0,60, 0,0 ,80 ,V # *#W«VaVaV« 

{TvI^&K'a****''*'*''*''''*'*'*'*''''*'**'*'*****'* 

^^l^*5^5 l S%V%*a # a*a*a*a*a*a*a*a"a a*a a*a a*!*!*!*!"!' 

PoKe y *0,q !4*q + 5: j j =jj+5: i-f q>250 than 4=30 

it i j >200thenpoKev +2 1 ,0 :poKe , , , +28,0!end 

■far d = l to 50 ìnext d 

poKe 2040,193 

poKe v +0 ,4 t 4=445 

rem delay 

■for d = l to 100 !next d 
goto 6340 


printchr $< 147> 
poKe36379,120 
v=7680 se=38400 
-f orK=495to 1 lstep -22 
poKeo +K ,65!poKec+K,0 
•fory = lto50!rexty 
poKev +K,32 spoKec+K,7 
nextK 
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Collisioni ài caratteri ViC 2Ùy\\ 

\S ~r »WcHf *' i 4"’ ‘ 

se pc<cess3**3..:s? 

•*' 30 'y-■’cS? 

4P •f.orK.*495'to.! is ;: te* -22 

pr irvt "3EFEEK < -y 'V^I'MV.V.V.V, 
^•*»^»^'fp»66'therpcKsv ,4£s 

**•**50 poK*vH- ,65 1 poKec +« , ®' V»*X%vX'!***' 1 

63 -fory “Ito 100!r*ex'ty 

,•*•*70 pokeutK,3S!poKec+K,7 «*•*•*•*•*•*•*•*•*•*•*•' 

■0 • me 9 9 9 9 0 0 9 0 0 9 9 9 9 0 9 9 9 9 9 9 9 9 WWW i 
Li 9 0 9 0 9 9 0 9 9 0 9 9 9 9 9 9 9 9 9 WWW WWW WWW 

090909009 W^9_9_9_9_9_9_9_w_w^w^w_w_w_w_w_w_m_w_w' 
10 9 0 9 0 • • I M • IJ-M • ■JJ-V- , *v - f É , 4 v* i 

9 9 9 0 9 0 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 WWW www ^ 
1 * 0 9 ••••••_•_• 1 0^0^0^0^0^0 9 9 9 9 9 9 9 9 9 W W W 

09990 99 9e 9 9 9 wwww w w<w w * 

10 9 9 9 9 9 0 9^0^9 9 9 9 9 9^99WWWWWWWWwmm'm 
0 • e 9 0 0 9 9 9 9 0 0 9 9 9 9 9 9 9 9 9 9 9 9 WWWWW\ 
19099000999 9 9 9 9 9 9 9 9 9 9 www www www 
9 9 9 9 9 9 9 9 0J9J9^O 0 9 9 0 9 9 9 9 >9 9 9 9 9 9 w ww% 
r§ 990909999 • ■ • • • • 

■ • • • • • • • • • • • • • • • ■ 

0 9 0 9 9 9 9 0 9 9 9 0^99^9^990^^9^^0 9 9 9 0 9^90* 

Uomo che commino VIC 20 

10 ooke52 ,28:poKe5S,28!poKe51 ,0:poke55,0 

»ViWi^^WWSV»'«V»V»V«V»V#V#' 

1040 coke 7168+K, peek <32768+K) 

!XwJ\Vt%*»V#V#V»V«V»V»V»V»V«V 

1080 fork=33*eto5S*e+7 

!»*»Vl 00 re«,dj *%*»**%*#*#*#***#*#*«*»*0*«*«*0*0%*«*i 
(V<W/A*rtW/*V»%V*V«V«V#V»VtV 

KvK'2'W*^*»*» •W**»*#*»*»***»*»*******»*»***» 

1360 ?oKe368S9,255 

1200 d ut a24 ,24 .-60 ,30,24,24 ,20,13 

1220 data25 ,26 ,60 ,88 ,24 ,24 ,40 ,72 

2000 poK e 36S79,120 

2020 v=7680:c=38400 

2040 -f ork =440to461 

2060 poKeu+k' ,58:poKec+K ,0 

2030 fory = Ito 100!nexly 

2090 pokev +K,59 

2100 -fory = l-tol00:nex-ty 

2120 pokeu+K,3£«pokec+K ,7 

.2200 nextk 

3000 pr in-t tpoke368S9,240 


- - • • 

• ••••• 

) • • • • • • 
• ••••• 

• ••••• 

• ••••• 


vv.v.% 


{%%%%%% 


# » V# # 

*,V.V 

'.ViV. 


WAV 

L» • • • • • 
riti#» j 
• • • •#< 

► •••••] 
[• • • • • J 

• •••••( 


.V.V.V 





CAR 

COD 

CAR COD 

CAR 

COD 

CAR 

— 

COD 

CAR 

COD 

CAR 

COD 


0 

1 33 

B 

66 

B 

99 


132 

□ 

165 


1 

" 34 

C 

67 

0 

100 

ti 

133 


166 


2 

# 35 

D 

68 

□ 

101 

(3 

134 

□ 

167 


3 

S 36 

E 

69 

a 

102 

f5 

135 

Q 

168 


4 

% 37 

F 

70 

□ 

103 

f7 

136 

E 

169 

Al 

5 

& 38 

G 

71 

□ 

104 

f2 


□ 

170 


6 

39 

H 

72 

□ 

105 

14 

138 

ffl 

171 


7 

( 40 

1 

73 

□ 

106 

f6 

139 

3 

172 

a» E33= 

) 41 

J 

74 

H 

107 

(8 

140 

ffl 

173 

m B33- 

* 42 

K 

75 

□ 

106 

cacaci 

□ 

174 


10 

+ 43 

L 

76 

S 

109 

j-r-v -- y.'i 

ri 7 « ri 

142 

□ 

175 


11 

44 

M 

77 

0 

110 


143 

B 

176 


12 

45 

N 

78 

c 

111 

o 

144 

B 

177 


13 

46 

0 

79 

□ 

112 


145 

B 

178 


14 

/ 47 

P 

80 

♦ 

113 

o 

146 

ffl 

179 


15 

0 48 

0 

81 

□ 

114 

9 

147 

□ 

160 


16 

1 49 

R 

82 

s 

115 

9 

148 

C 

181 

S9 

17 

2 50 

S 

83 

□ 

116 


149 

□ 

182 

CSM 

18 

3 51 

T 

84 

a 

117 


150 

n 

183 


19 

4 52 

U 

85 

e 

118 


151 

h 

184 

G3 

20 

5 53 

V 

86 

□ 

119 


152 

a 

185 


21 

6 54 

w 

87 


120 


153 

□ 

186 


22 

7 55 

X 

88 

□ 

121 


154 

a 

187 


23 

8 56 

Y 

89 

ao 

122 


155 

a 

188 


24 

9 57 

z 

90 

GB 

123 

o 

156 

a 

189 


25 

: 58 

[ 

91 

B 

124 

Q 

157 

o 

190 


26 

; 59 

£ 

92 

LD 

125 

a 

158 

s 

191 


27 

<Z 60 

] 

93 

@ 

126 


159 



d 

28 

- 61 

t 

94 

a 

127 

EZ 3 

160 



@ 

29 

Z> 62 

«- 

95 


128 

E 

161 



o 

30 

? 63 

B 

96 


129 

H 

162 



JOA 

31 

@ 64 

S 

97 


130 

□ 

163 



E22J 

32 

A 65 

m 

98 


131 

□ 

164 





• • • 




•!•!•!•!< 


B!a! 




• • • •" 
>•••§ 
•V*V 


A = CAAATTEI 
COD= CODICE 


do 192o223 
do 224 a 254 
255 


Idenrici ol codici 
Identici ai codici 
Identico ol codice 
















































































































































































Movimento con sprìte farfalla CDM 64 

IPC re» * » * aov i-nento M * 

!2« pòxe33260,8 326 ! ,3’p~ in* *3' 

1000 v» =53243 

1820 •fcrK =0toE2 if isdaieo-e ! 574-i-< , a s 

1040 poKsv *33,7 V.V ,V. *« '. . 

1060 poKe2040,24S 
1060 x=50fy=50 

1 100 poKeu ,x J poKev * I'»y Jpotca +2l» 1 
1206 form=ito8 
1300 -f or £ = 1-to 160 

1400 onmgosub2000 , 2100,2200,2300,2400,2500,2600,2700 
1420 poK'eu ,x : poKev + 1 ,y 
1500 nexts 

1600 i-f m=6thenx =2 10 s y =50 
1700 nextm 

VjVASV»V#'«V»V«V»V»V»V»V»%V»V#V»V»V 

2000 x =x+ 1 :reiurn 
2100 y=y+l:return 

era0#VJ**-af«%é4i»r «%*•*•*•*•*•*•"•*•*•*•*•"•*•*•*•*•*•*•*•*•*•*•*• 

2300 y=y-lireturn 
2400 x =x + 1 : y =y + 1 ire-turn 
2500 x =x- 1 :y =y- 1 :rslum 

2600 x =x -1 t y *y + 1 i re -tur n**%%*«*»*•*•*•%%*•*•*•*•*•*•%*•*•% 
2700 x =x M « y =y - 1 ireiurn •V»*»"|V#*»V»V»"»V#%V»V| 

3000 rem *** spr Ile farfalla *** 

3010 data2,0,64,43,0,140 
3020 datal20,129,30,252,66,63 
3030 data254,36,127,255,24,255 
3040 data255,133,255,255,213,255 
3050 data255,255,255,255,255,255 
3060 data255,255,255,255,255,255 
3070 dat a255 ,255,255,255,255,255 
3060 data255 ,255,255,255,255,255 
3030 data255,213,255,127,153,254 
3100 c*ata63,24,252,30,24,120 
31 10 data 12,24,43 


iprite lettera "G" CDM 64 

3000 rem *#* spri-te let+eri g *** 
3010 data255 

3020 data255,255,255,255,255 
3030 data224,0,7,224,0 
3040 data7,231,255,231,231 
3050 data255,231,231,255,255 
30S0 data231,255,255,231,255 
3070 data255,231,255,255,231 
3080 data255,255,231,240,7 
3030 data23I ,240,7,231 ,255 
3100 data231,231 ,255,231,231 
3110 data255,231 ,231,255,231 
3120 data224 ,0,7,224,0 
3130 da-ta7,255 ,255,255,255 
3140 data255 ,255 


iprite lettera "J” CDM 64 

3000 rsm *** lettela j *** 

3010 da-ta255,255 
3020 data255,255,255,255,224 
3030 data0,7,224,0,7 
3040 data255,227,255 , 255,227 
3050 data255,255,227,255,255 
3060 data227,255,255,227,255 
3070 dat a255,227,255,255,227 
3030 data255,255,227,255,231 
3090 data227,255,231,227,255 
3100 data231,227,255,231,227 
3110 data255,231,227,255,224 
3120 data3 ,255,224,3,255 
3130 data255 ,255,255,255,255 
3140 data255 
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Sprite razza coffe C£At#£X 

’iW j* . */■* '\kXT.K a." . *-** 

’.*■ 5«ie Mt*» .'.’. , .V.V.*.*.'. V* 


d a t*6*,«*.-,s3,e 


32 M 0 datae,e.se.a,» 

• • f V • • • • • f | f| f f ffff 



rem *** sprite gabbia 
data255,255,255 


**# 


3P50 data»,0,255,255.132 
3060 data255,255,192,245,25 
3070 dat a252,245,35,254,243 
3030 data85, 199,245,35,135 
data245,85,135,245,85 
data 195,245,85,139,245 
data35,206,245,35,252 
data245,85,243,245,35 
data240,245,85,192,255 
data255,192 


3090 
3100 
31 10 
3120 
3130 
3140 


y.v.v.v.v. 

itti•••• ••• 

-v.v.v.v.sv 


Sprite gabbia zoo CDM 64 


3000 

3010 

3C20 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 

3130 


d ata255,255,255,132,18 
data65,132,16,65,132 
data 16,65,132,16,65 
data 132,16,65,132,16 
data.65,132,16,65,132 
data 16,65,132,16,65 
datai 32,16,65,132,16 
data65,132,16,65,132 
data 16,65,132,16,65 
data 132,16,65,132,16 
data65,132,16,65,255 
data255,255,255,255,255 
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Sprire coniglio CDM 64 


3000 reir +** spr i-te coniglio 
3010 data© 

3020 data©,0,255,@,255 
3030 data255,129,255,15,199 
3040 data224,3,199,128,0 
3050 data238,0,0,238,0 
30S0 data?,233,0,9,255 
3070 data0,1 ,255, 128,SK»\K 
3030 datal47,192,7,147,224 
3090 data 15.147,240,31 ,233 
3100 da%a248 ,31,125 '.243,15 
3110 da+al31 ,240,7,131 .224 
3120 dat»3 - 131 ,192,!,255 
3130 datal28,0.-127, 0,0 
3140 dat?0rÓ 
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Sprite lupo CBM 64 

3003 rem *** sprite lupo *** 
3010 dala0,0,0,0,0 
3020 data?,0,0,48,1 
3030 da+al92,112,0,24C,240 
3040 data©,121,224,0,SI 
3050 da-?al92,0,3! , 192,0 
30S0 datalS,224,0,83,224 
3070 data?,255,240,127,199 
3030 dat a248,255,255,252,255 
3090 data255 ,254,255,255,254 
3100 dat a 123,255,254,42,255 
3110 data254,127,255,252,1 
3120 data255,243,1,255,240 
3130 datai ,255,240 








